home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 090 / vol7n5.arc / ASPRN.BAS < prev    next >
Encoding:
BASIC Source File  |  1988-03-15  |  21.3 KB  |  311 lines
  1. 100 REM -- BASIC PROGRAM TO CREATE asprn.COM
  2. 110 OPEN "asprn.COM" AS #1 LEN = 1
  3. 120 FIELD #1,1 AS A$
  4. 130 CHECKSUM = 0
  5. 140 FOR I = 1 TO  290 
  6. 150    LINESUM = 0
  7. 155    PRINT ".";
  8. 160    FOR J = 1 TO 8
  9. 170       READ BYTE
  10. 180       CHECKSUM = CHECKSUM + BYTE
  11. 190       LINESUM = LINESUM + BYTE
  12. 200       IF (BYTE < 256) THEN LSET A$ = CHR$(BYTE)
  13. 210       PUT #1
  14. 220    NEXT J
  15. 230    READ LINECHECK
  16. 240    IF LINECHECK <> LINESUM THEN PRINT "Error in Line";280 + 10 * I
  17. 250 NEXT I
  18. 260 CLOSE
  19. 270 IF CHECKSUM = 236727 THEN PRINT "Successful Completion!" : END
  20. 280 PRINT "COM file is not valid!" : END
  21. 290 DATA    233,    61,     1,   126,    65,    83,    80,    82,   731
  22. 300 DATA     78,    32,    49,    46,    48,    32,    40,    99,   424
  23. 310 DATA     41,    32,    49,    57,    56,    56,    32,    90,   413
  24. 320 DATA    105,   102,   102,    32,    67,   111,   109,   109,   737
  25. 330 DATA    117,   110,   105,    99,    97,   116,   105,   111,   860
  26. 340 DATA    110,   115,    32,    67,   111,    46,    13,    10,   504
  27. 350 DATA     80,    67,    32,    77,    97,   103,    97,   122,   675
  28. 360 DATA    105,   110,   101,    32,   254,    32,    82,   111,   827
  29. 370 DATA     98,   101,   114,   116,    32,    76,    46,    32,   615
  30. 380 DATA     72,   117,   109,   109,   101,   108,    13,    10,   639
  31. 390 DATA     36,    26,     0,     0,     0,     0,   214,     9,   285
  32. 400 DATA      0,     0,    53,     0,     0,     0,    46,   128,   227
  33. 410 DATA     62,    93,     1,     0,   117,     5,   251,    10,   539
  34. 420 DATA    228,   116,     6,   250,    46,   255,    46,    82,  1029
  35. 430 DATA      1,    46,   128,    62,    92,     1,     0,   117,   447
  36. 440 DATA     16,    46,    58,     6,     3,     1,   117,   235,   482
  37. 450 DATA     46,   254,     6,    92,     1,   180,     2,   235,   816
  38. 460 DATA    226,    46,   198,     6,    92,     1,     0,    46,   615
  39. 470 DATA     58,     6,     3,     1,   116,   213,    12,    32,   441
  40. 480 DATA     44,    97,    60,    25,   119,   231,   232,     2,   810
  41. 490 DATA      0,   235,   226,    30,    86,    81,    46,   197,   901
  42. 500 DATA     54,    86,     1,   138,   200,     2,   201,   254,   936
  43. 510 DATA    193,    10,   201,   116,     9,   254,   201,   172,  1156
  44. 520 DATA     10,   192,   117,   251,   235,   243,   172,    10,  1230
  45. 530 DATA    192,   116,    13,   156,    50,   228,    46,   255,  1056
  46. 540 DATA     30,    82,     1,   128,   252,    16,   116,   238,   863
  47. 550 DATA     89,    94,    31,   195,   252,   190,   214,     9,  1074
  48. 560 DATA    191,   249,     1,   139,    14,    90,     1,   140,   825
  49. 570 DATA      6,    88,     1,   137,    62,    86,     1,   139,   520
  50. 580 DATA    209,     3,   215,   243,   164,   131,   194,    15,  1174
  51. 590 DATA    177,     4,   211,   234,   184,     0,    49,   205,  1064
  52. 600 DATA     33,    78,   111,   116,    32,    82,   101,   115,   668
  53. 610 DATA    105,   100,   101,   110,   116,    36,    67,    97,   732
  54. 620 DATA    110,   110,   111,   116,    32,    85,   110,   105,   779
  55. 630 DATA    110,   115,   116,    97,   108,   108,    36,    85,   775
  56. 640 DATA    115,    97,   103,   101,    58,    32,    32,    65,   603
  57. 650 DATA     83,    80,    82,    78,    32,    91,    32,    47,   525
  58. 660 DATA     85,    32,   124,    32,    47,    83,    32,    93,   528
  59. 670 DATA     91,    32,    47,    77,   120,    32,   124,    32,   555
  60. 680 DATA     47,    67,   110,   110,   110,    32,    93,    36,   605
  61. 690 DATA    250,   188,    11,    11,   251,   186,     4,     1,   902
  62. 700 DATA    180,     9,   205,    33,     6,   139,    30,    44,   646
  63. 710 DATA      0,   142,   195,   180,    73,   205,    33,     7,   835
  64. 720 DATA    232,    91,     0,   115,    12,   186,    23,     2,   661
  65. 730 DATA    180,     9,   205,    33,   184,     1,    76,   205,   893
  66. 740 DATA     33,   246,   196,     1,   116,    10,   232,   192,  1026
  67. 750 DATA      0,   114,   237,   184,     0,    76,   205,    33,   849
  68. 760 DATA    246,   196,     2,   116,     3,   233,   230,     2,  1028
  69. 770 DATA    232,   250,     0,   114,     3,   233,    60,     1,   893
  70. 780 DATA      6,   184,    23,    53,   205,    33,   137,    30,   671
  71. 790 DATA     82,     1,   140,     6,    84,     1,     7,   184,   505
  72. 800 DATA     23,    37,   186,    94,     1,   205,    33,   232,   811
  73. 810 DATA    229,     1,   115,     3,   233,    45,   255,   232,  1113
  74. 820 DATA    237,     1,   186,    30,     0,   184,     0,    49,   687
  75. 830 DATA    205,    33,    32,    44,    59,     9,    50,   246,   678
  76. 840 DATA    190,   128,     0,   172,    10,   192,   117,     4,   813
  77. 850 DATA    248,   138,   230,   195,   138,   216,    10,   219,  1394
  78. 860 DATA    116,   246,   172,   254,   203,   191,   178,     2,  1362
  79. 870 DATA    185,     4,     0,   242,   174,   116,   239,    60,  1020
  80. 880 DATA     47,   116,     4,   180,   255,   249,   195,    10,  1056
  81. 890 DATA    219,   116,   248,   172,   254,   203,    36,   223,  1471
  82. 900 DATA     60,    85,   116,    14,    60,    83,   116,    15,   549
  83. 910 DATA     60,    77,   116,    16,    60,    67,   116,    24,   536
  84. 920 DATA    235,   225,   128,   206,     1,   235,   199,   128,  1357
  85. 930 DATA    206,     2,   235,   194,    10,   219,   116,   211,  1193
  86. 940 DATA    172,   254,   203,   162,     3,     1,   235,   182,  1212
  87. 950 DATA    185,     3,     0,   183,    10,    51,   192,   139,   763
  88. 960 DATA    248,    10,   219,   116,   190,   172,   254,   203,  1412
  89. 970 DATA     44,    48,    60,     9,   119,   181,   151,   246,   858
  90. 980 DATA    231,     3,   248,   226,   236,   139,   199,   235,  1517
  91. 990 DATA    218,   232,    73,     0,   186,   249,     1,   115,  1074
  92. 1000 DATA     1,   195,    83,   184,    23,    53,   205,    33,   777
  93. 1010 DATA    91,   186,     6,     2,   140,   192,    59,   195,   871
  94. 1020 DATA   116,    10,    83,     7,    38,   198,     6,    93,   551
  95. 1030 DATA     1,   255,   249,   195,    38,   197,    22,    82,  1039
  96. 1040 DATA     1,   184,    23,    37,   205,    33,    38,   196,   717
  97. 1050 DATA     6,    86,     1,   180,    73,   205,    33,   114,   698
  98. 1060 DATA   225,   140,   192,    59,   195,   116,     8,   142,  1077
  99. 1070 DATA   195,   180,    73,   205,    33,   114,   211,   248,  1259
  100. 1080 DATA    14,    31,    14,     7,   195,   252,   247,    22,   782
  101. 1090 DATA     0,     1,   187,     0,     6,   140,   200,    67,   601
  102. 1100 DATA   142,   195,    59,   195,   117,     2,   249,   195,  1154
  103. 1110 DATA   190,     0,     1,   139,   254,   185,    16,     0,   785
  104. 1120 DATA   243,   166,    11,   201,   117,   233,   248,   195,  1414
  105. 1130 DATA    13,    10,    65,    83,    80,    82,    78,    32,   443
  106. 1140 DATA    70,    97,   105,   108,   101,   100,    46,    32,   659
  107. 1150 DATA    83,   117,   103,   103,   101,   115,   116,    32,   770
  108. 1160 DATA    82,   101,    98,   111,   111,   116,    46,    13,   678
  109. 1170 DATA    10,    36,     0,     0,   180,    80,   140,   195,   641
  110. 1180 DATA   205,    33,    38,   161,    88,     1,    59,   195,   780
  111. 1190 DATA   116,    13,     6,   142,   192,   180,    73,   205,   927
  112. 1200 DATA    33,     7,   115,    12,   235,    52,   144,   187,   785
  113. 1210 DATA    30,     0,   180,    74,   205,    33,   114,    42,   678
  114. 1220 DATA   232,   156,     0,   114,    14,   232,   167,     0,   915
  115. 1230 DATA   180,    80,   140,   203,   205,    33,   184,     0,  1025
  116. 1240 DATA    76,   205,    33,   180,    80,   140,   203,   205,  1122
  117. 1250 DATA    33,     6,   180,    74,   187,   177,     0,   137,   794
  118. 1260 DATA    30,   194,     3,    14,     7,   205,    33,     7,   493
  119. 1270 DATA   115,    18,   186,   160,     3,   180,     9,   205,   876
  120. 1280 DATA    33,    38,   198,     6,    93,     1,   255,   184,   808
  121. 1290 DATA   255,    76,   205,    33,   180,    72,   187,   255,  1263
  122. 1300 DATA   255,   205,    33,   129,   251,   177,     0,   114,  1164
  123. 1310 DATA   225,   180,    72,   205,    33,   114,   219,    51,  1099
  124. 1320 DATA   246,   139,   254,     6,   142,   192,   185,    11,  1175
  125. 1330 DATA    11,   252,   243,   164,     7,    80,   186,    76,  1019
  126. 1340 DATA     4,    82,   250,   203,    14,    23,   188,    11,   775
  127. 1350 DATA    11,   251,   139,   216,   180,    80,   205,    33,  1115
  128. 1360 DATA     6,    30,     7,   180,    73,   205,    33,     7,   541
  129. 1370 DATA   114,   176,    14,    31,   180,    80,   140,   195,   930
  130. 1380 DATA   205,    33,   232,    26,     0,   232,    39,     0,   767
  131. 1390 DATA   180,    80,   140,   203,   205,    33,    14,     7,   862
  132. 1400 DATA   180,    74,   139,    30,   194,     3,   205,    33,   858
  133. 1410 DATA   114,   144,   184,     0,    76,   205,    33,   180,   936
  134. 1420 DATA    72,   139,    30,    90,     1,   131,   195,    15,   673
  135. 1430 DATA   177,     4,   211,   235,   205,    33,   195,     6,  1066
  136. 1440 DATA   139,    14,    90,     1,    38,   137,    14,    90,   523
  137. 1450 DATA     1,    51,   255,    38,   137,    62,    86,     1,   631
  138. 1460 DATA    38,   163,    88,     1,   142,   192,   190,   214,  1028
  139. 1470 DATA     9,   252,   243,   164,     7,   195,    78,   111,  1059
  140. 1480 DATA   116,    32,    69,   110,   111,   117,   103,   104,   762
  141. 1490 DATA    32,    77,   101,   109,   111,   114,   121,    36,   701
  142. 1500 DATA    13,    10,    83,    97,   118,   101,    32,    99,   553
  143. 1510 DATA   104,    97,   110,   103,   101,   115,    32,    97,   759
  144. 1520 DATA   115,    32,    65,    83,    80,    82,    78,    78,   613
  145. 1530 DATA    69,    87,    46,    67,    79,    77,    63,    32,   520
  146. 1540 DATA    40,    89,    47,    78,    41,    32,    36,    13,   376
  147. 1550 DATA    10,    79,   118,   101,   114,   119,   114,   105,   760
  148. 1560 DATA   116,   101,    32,   101,   120,   105,   115,   116,   806
  149. 1570 DATA   105,   110,   103,    32,   102,   105,   108,   101,   766
  150. 1580 DATA    63,    32,    40,    89,    47,    78,    41,    32,   422
  151. 1590 DATA    36,    13,    10,    70,   105,   108,   101,    32,   475
  152. 1600 DATA   101,   114,   114,   111,   114,    46,    32,    84,   716
  153. 1610 DATA   114,   121,    32,    65,   103,    97,   105,   110,   747
  154. 1620 DATA    63,    32,    40,    89,    47,    78,    41,    32,   422
  155. 1630 DATA    36,    13,    10,    87,   114,   105,   116,   101,   582
  156. 1640 DATA    32,   101,   114,   114,   111,   114,    46,    32,   664
  157. 1650 DATA    84,   114,   121,    32,    65,   103,    97,   105,   721
  158. 1660 DATA   110,    63,    32,    40,    89,    47,    78,    41,   500
  159. 1670 DATA    32,    36,    65,    83,    80,    82,    78,    78,   534
  160. 1680 DATA    69,    87,    46,    67,    79,    77,     0,    11,   436
  161. 1690 DATA    10,    24,    80,     0,     0,     0,   180,    74,   368
  162. 1700 DATA   187,     0,    16,   205,    33,   115,    12,   186,   754
  163. 1710 DATA   182,     4,   180,     9,   205,    33,   184,     2,   799
  164. 1720 DATA    76,   205,    33,   250,   188,   254,   255,   251,  1512
  165. 1730 DATA   232,   148,     0,   160,    98,     5,    44,     2,   689
  166. 1740 DATA   162,    99,     5,   232,   105,     2,   232,   219,  1056
  167. 1750 DATA     0,   139,    14,    95,     5,   129,   233,   214,   829
  168. 1760 DATA     9,   137,    14,    90,     1,   186,   200,     4,   641
  169. 1770 DATA   232,    96,     0,   114,     5,   184,     3,    76,   710
  170. 1780 DATA   205,    33,   184,     2,    61,   186,    82,     5,   758
  171. 1790 DATA   205,    33,   114,    16,   139,   216,   186,   239,  1148
  172. 1800 DATA     4,   232,    71,     0,   114,    29,   180,    62,   692
  173. 1810 DATA   205,    33,   235,   217,   180,    60,    51,   201,  1182
  174. 1820 DATA   186,    82,     5,   205,    33,   115,    10,   186,   822
  175. 1830 DATA    17,     5,   232,    46,     0,   114,   237,   235,   886
  176. 1840 DATA   196,   139,   216,   180,    64,   139,    14,    95,  1043
  177. 1850 DATA     5,   129,   233,     0,     1,   186,     0,     1,   555
  178. 1860 DATA   205,    33,   114,     4,    59,   193,   116,    10,   734
  179. 1870 DATA   186,    49,     5,   232,    13,     0,   114,   227,   826
  180. 1880 DATA   235,   196,   180,    62,   205,    33,   184,     0,  1095
  181. 1890 DATA    76,   205,    33,   180,     9,   205,    33,   232,   973
  182. 1900 DATA   190,     3,    36,   223,    60,    78,   117,     1,   708
  183. 1910 DATA   195,    60,    89,   117,   242,   249,   195,   180,  1327
  184. 1920 DATA    15,   205,    16,   198,     6,   101,     5,    31,   577
  185. 1930 DATA    60,     3,   118,    11,    60,     7,   116,     2,   377
  186. 1940 DATA   249,   195,   198,     6,   101,     5,     7,   136,   897
  187. 1950 DATA    38,    98,     5,   136,    62,   100,     5,   180,   624
  188. 1960 DATA    18,   179,    16,   205,    16,   128,   251,    16,   829
  189. 1970 DATA   178,    24,   116,     9,     6,   184,    48,    17,   582
  190. 1980 DATA   183,     0,   205,    16,     7,   136,    22,    97,   666
  191. 1990 DATA     5,   248,   195,    80,   180,     2,   138,    62,   910
  192. 2000 DATA   100,     5,   139,    22,   104,     6,   205,    16,   597
  193. 2010 DATA    88,   195,     0,     0,     0,     0,     0,     0,   283
  194. 2020 DATA     6,     0,     0,     0,   198,     6,   106,     6,   322
  195. 2030 DATA     0,   199,     6,   104,     6,     6,     1,   232,   554
  196. 2040 DATA   217,   255,   180,    10,   160,     3,     1,   185,  1011
  197. 2050 DATA     1,     0,   205,    16,   254,     6,   104,     6,   592
  198. 2060 DATA   232,   200,   255,   180,    10,   160,   106,     6,  1149
  199. 2070 DATA     4,    65,   185,     1,     0,   205,    16,   232,   708
  200. 2080 DATA   203,     2,   187,     0,     0,   232,   175,     2,   801
  201. 2090 DATA   232,   236,     2,   187,     2,     0,   232,   166,  1057
  202. 2100 DATA     2,   232,   227,     2,   232,    25,     3,    10,   733
  203. 2110 DATA   192,   116,    75,    61,     8,    14,   117,    30,   613
  204. 2120 DATA    10,   228,   116,    26,   232,   112,     2,   114,   840
  205. 2130 DATA   235,   232,    19,     2,   114,   230,   232,   198,  1262
  206. 2140 DATA     2,   131,    62,   102,     6,     0,   117,   220,   640
  207. 2150 DATA   255,    14,   100,     6,   235,   214,   128,    62,  1014
  208. 2160 DATA   107,     6,     0,   116,     8,   232,   205,     1,   675
  209. 2170 DATA   128,    60,     0,   117,    14,   232,   217,     1,   769
  210. 2180 DATA   131,    62,   102,     6,     0,   117,     4,   255,   677
  211. 2190 DATA     6,   100,     6,   232,   177,     1,   232,   150,   904
  212. 2200 DATA     2,   232,   248,     1,   235,   174,   128,   252,  1272
  213. 2210 DATA    65,   117,    14,   198,     6,   104,     6,     0,   510
  214. 2220 DATA   198,     6,   105,     6,     9,   232,    67,   255,   878
  215. 2230 DATA   195,   138,    30,   106,     6,   128,   252,    83,   938
  216. 2240 DATA   116,   167,   128,   252,    73,   116,    47,   128,  1027
  217. 2250 DATA   252,    81,   116,    58,   139,    30,   102,     6,   784
  218. 2260 DATA   128,   252,    77,   116,   204,   128,   252,    75,  1232
  219. 2270 DATA   116,    55,   128,   252,    72,   116,    56,   128,   923
  220. 2280 DATA   252,    80,   116,    62,   128,   252,    82,   116,  1088
  221. 2290 DATA    68,   128,   252,    79,   116,    70,   128,   252,  1093
  222. 2300 DATA    71,   116,    73,   233,    94,   255,   254,   203,  1299
  223. 2310 DATA   128,   251,     0,   125,     2,   179,    25,   136,   846
  224. 2320 DATA    30,   106,     6,   233,    19,   255,   254,   195,  1098
  225. 2330 DATA   128,   251,    25,   118,   242,    50,   219,   235,  1268
  226. 2340 DATA   238,   232,   195,     1,   233,    61,   255,   131,  1346
  227. 2350 DATA   251,     0,   116,   248,   187,     0,     0,   233,  1035
  228. 2360 DATA    44,   255,   131,   251,     2,   116,   237,   187,  1223
  229. 2370 DATA     2,     0,   233,    33,   255,   246,    22,   107,   898
  230. 2380 DATA     6,   233,    32,   255,   232,   101,     1,   115,   975
  231. 2390 DATA   251,   233,    24,   255,   232,   152,     1,   115,  1263
  232. 2400 DATA   251,   233,    16,   255,   181,    65,    83,    80,  1164
  233. 2410 DATA    82,    78,    32,    49,    46,    48,   198,     0,   533
  234. 2420 DATA    83,    84,    82,    73,    78,    71,    58,    32,   561
  235. 2430 DATA    27,    32,    26,    32,    73,    78,    83,    32,   383
  236. 2440 DATA    68,    69,    76,    32,    24,    32,    25,    32,   358
  237. 2450 DATA    32,    77,    65,    67,    82,    79,    58,    32,   492
  238. 2460 DATA    80,   103,    85,   112,    32,    80,   103,    68,   663
  239. 2470 DATA   110,    32,    32,    70,    55,    32,    61,    32,   424
  240. 2480 DATA    83,    97,   118,   101,     0,    78,    65,    77,   619
  241. 2490 DATA    69,    32,    58,     0,    77,    65,    67,    82,   450
  242. 2500 DATA    79,    58,     0,   201,   205,   187,   186,    32,   948
  243. 2510 DATA   186,   199,   196,   182,   200,   205,   188,   184,  1540
  244. 2520 DATA     0,     7,   138,    62,   101,     5,    51,   201,   565
  245. 2530 DATA   138,    54,    97,     5,   138,    22,    98,     5,   557
  246. 2540 DATA   254,   202,   205,    16,   138,    62,   100,     5,   982
  247. 2550 DATA   190,   235,     7,   139,   209,   185,     9,     0,   974
  248. 2560 DATA    81,   178,     0,   180,     2,   205,    16,   172,   834
  249. 2570 DATA   180,    14,   205,    16,   172,   180,    10,   138,   915
  250. 2580 DATA    14,    98,     5,    50,   237,   131,   233,     2,   770
  251. 2590 DATA   205,    16,   180,     2,   178,     0,     2,    22,   605
  252. 2600 DATA    98,     5,   254,   202,   205,    16,   172,   180,  1132
  253. 2610 DATA    10,   185,     1,     0,   205,    16,   254,   198,   869
  254. 2620 DATA    89,   128,   249,     9,   116,    16,   128,   249,   984
  255. 2630 DATA     2,   117,     3,   131,   198,     3,   246,   193,   893
  256. 2640 DATA     1,   116,     3,   131,   238,     6,   226,   184,   905
  257. 2650 DATA   198,     6,   105,     6,     0,   160,    99,     5,   579
  258. 2660 DATA    44,    17,   162,   104,     6,   190,   156,     7,   686
  259. 2670 DATA   232,    33,     0,   199,     6,   104,     6,     1,   581
  260. 2680 DATA     7,   190,   168,     7,   232,    21,     0,   199,   824
  261. 2690 DATA     6,   104,     6,     1,     3,   190,   221,     7,   538
  262. 2700 DATA   232,     9,     0,   199,     6,   104,     6,     1,   557
  263. 2710 DATA     5,   190,   228,     7,   232,   188,   253,   138,  1241
  264. 2720 DATA    62,   100,     5,   172,    10,   192,   116,     6,   663
  265. 2730 DATA   180,    14,   205,    16,   235,   241,   195,   232,  1318
  266. 2740 DATA     3,     0,   136,     4,   195,   139,    30,   102,   609
  267. 2750 DATA     6,   139,   183,    98,     6,    50,   237,   138,   857
  268. 2760 DATA    14,   104,     6,   128,   233,     7,     3,   241,   736
  269. 2770 DATA   195,   232,   233,   255,   139,    14,    95,     5,  1168
  270. 2780 DATA   139,   249,    43,   206,   139,   247,    78,   253,  1354
  271. 2790 DATA   243,   164,   255,     6,    95,     5,   195,   232,  1195
  272. 2800 DATA   211,   255,   128,    60,     0,   117,     2,   249,  1022
  273. 2810 DATA   195,   139,    14,    95,     5,    43,   206,    73,   770
  274. 2820 DATA   139,   254,    70,   252,   243,   164,   255,    14,  1391
  275. 2830 DATA    95,     5,   248,   195,   232,   182,   255,   128,  1340
  276. 2840 DATA    60,     0,   117,     2,   249,   195,   138,    14,   775
  277. 2850 DATA   104,     6,    58,    14,    99,     5,   116,    11,   413
  278. 2860 DATA   254,   193,   136,    14,   104,     6,   232,    66,  1005
  279. 2870 DATA   253,   248,   195,   255,   135,    98,     6,   255,  1445
  280. 2880 DATA    54,   104,     6,   198,     6,   104,     6,     7,   485
  281. 2890 DATA   232,    48,   253,   232,   105,     0,   143,     6,  1019
  282. 2900 DATA   104,     6,   232,    38,   253,   248,   195,   138,  1214
  283. 2910 DATA    14,   104,     6,   128,   249,     7,   116,     4,   628
  284. 2920 DATA   254,   201,   235,   206,   139,   183,    98,     6,  1322
  285. 2930 DATA    78,   128,    60,     0,   116,   182,   137,   183,   884
  286. 2940 DATA    98,     6,   232,    66,     0,   248,   195,   137,   982
  287. 2950 DATA    30,   102,     6,   198,     6,   104,     6,     7,   459
  288. 2960 DATA   182,     3,    11,   219,   116,     2,   182,     5,   720
  289. 2970 DATA   136,    54,   105,     6,   195,   138,    30,   106,   770
  290. 2980 DATA     6,   208,   227,   232,    14,     0,   137,    54,   878
  291. 2990 DATA    98,     6,   254,   195,   232,     5,     0,   137,   927
  292. 3000 DATA    54,   100,     6,   195,   190,   214,     9,    50,   818
  293. 3010 DATA   255,    58,   251,   117,     1,   195,   172,    10,  1059
  294. 3020 DATA   192,   117,   251,   254,   199,   235,   242,   252,  1742
  295. 3030 DATA   232,   192,   252,   232,    23,   255,   138,    46,  1370
  296. 3040 DATA   104,     6,   138,    14,    99,     5,   172,    10,   548
  297. 3050 DATA   192,   117,     3,    78,   176,    32,   232,   170,  1000
  298. 3060 DATA   252,    81,   180,    10,   138,    62,   100,     5,   828
  299. 3070 DATA   185,     1,     0,   205,    16,    89,   254,     6,   756
  300. 3080 DATA   104,     6,    58,    14,   104,     6,   115,   222,   629
  301. 3090 DATA   136,    46,   104,     6,   232,   140,   252,   195,  1111
  302. 3100 DATA   205,    40,   180,     1,   205,    22,   116,   248,  1017
  303. 3110 DATA    50,   228,   205,    22,   195,     0,     0,     0,   700
  304. 3120 DATA     0,     0,     0,     0,     0,     0,     0,     0,     0
  305. 3130 DATA     0,     0,     0,     0,     0,     0,     0,     0,     0
  306. 3140 DATA     0,     0,     0,     0,     0,     0,     0,     0,     0
  307. 3150 DATA     0,     0,     0,     0,     0,     0,     0,     0,     0
  308. 3160 DATA     0,     0,     0,     0,     0,     0,     0,     0,     0
  309. 3170 DATA     0,     0,     0,     0,     0,     0,     0,     0,     0
  310. 3180 DATA     0,     0,     0,     0,     0,     0,     0,     0,     0
  311.